﻿
''' <summary>
''' 提供用户 ComicService 容器的基础类型
''' </summary>
''' <remarks></remarks>
Public MustInherit Class ItemBase


    Sub New()
    End Sub

    Protected Friend Sub New(ByVal id As String, ByVal title As String, ByVal image As Uri, ByVal imageMimeType As String, ByVal itemUrl As Uri, ByVal dateCreated As DateTimeOffset, ByVal dateModified As DateTimeOffset)
        With Me
            ._id = id
            ._title = title
            ._image = image
            ._imageMimeType = imageMimeType
            ._itemUrl = itemUrl
            ._dateCreated = dateCreated
            ._dateModified = dateModified

        End With
    End Sub



    Dim _id As String

    ''' <summary>
    ''' 标题
    ''' </summary>
    ''' <remarks></remarks>
    Dim _title As String

    '''<summary>显示图片</summary>
    Dim _image As Uri

    '''<summary>显示图片 MimeType</summary>
    Dim _imageMimeType As String


    '''<summary>路径</summary>
    Dim _itemUrl As Uri

    ''' <summary>
    ''' 建立时间
    ''' </summary>
    Dim _dateCreated As DateTimeOffset


    ''' <summary>
    ''' 修改时间
    ''' </summary>
    ''' <remarks></remarks>
    Dim _dateModified As DateTimeOffset



    ''' <summary>
    ''' 建立时间
    ''' </summary>
    ''' <remarks></remarks>
    Public Property DateCreated() As DateTimeOffset
        Get
            Return _dateCreated
        End Get
        Set(ByVal value As DateTimeOffset)
            _dateCreated = value
        End Set
    End Property

    ''' <summary>
    ''' 修改时间
    ''' </summary>
    ''' <remarks></remarks>
    Public Property DateModified() As DateTimeOffset
        Get
            Return _dateModified
        End Get
        Set(ByVal value As DateTimeOffset)
            _dateModified = value
        End Set
    End Property

    Public Property Id() As String
        Get
            Return _id
        End Get
        Set(ByVal value As String)
            _id = value
        End Set
    End Property


    ''' <summary>显示图片 MimeType</summary>
    Public Property ImageMimeType() As String
        Get
            Return _imageMimeType
        End Get
        Set(ByVal value As String)
            _imageMimeType = value
        End Set
    End Property
    ''' <summary>路径</summary>
    Public Property ItemUrl() As Uri
        Get
            Return _itemUrl
        End Get
        Set(ByVal value As Uri)
            _itemUrl = value
        End Set
    End Property
    ''' <summary>
    ''' 标题
    ''' </summary>
    ''' <remarks></remarks>
    Public Property Title() As String
        Get
            Return _title
        End Get
        Set(ByVal value As String)
            _title = value
        End Set
    End Property

    ''' <summary>显示图片</summary>
    Public Property Image() As Uri
        Get
            Return _image
        End Get
        Set(ByVal value As Uri)
            _image = value
        End Set
    End Property



End Class
